#!/usr/bin/perl
#pvresize.cgi
require './lvm-lib.pl';
&ReadParse();
my $err_msg = 'abc';
my $pv = $in{'pv'};

$out = `lvm pvresize $pv`;
$rc = $?>>8;
if($rc){
	$err_msg="Error:$rc:"." ".$text{'err_pvresize'};
	goto ERROR_OUT;
}
else{
	&redirect("index.cgi");
}
ERROR_OUT:
&error_setup($text{'crt_err_title'});
&error($err_msg);
